1 REM ==================================
2 REM    COMMODARES PROBLEM #43-2 :
3 PRINT" [208]ERM [208]ARITY"
4 REM    SOLUTION BY
5 REM     DAVID HOFFNER
6 REM ==================================
7 RINT"[197]NTER ONE DIGIT AT A TIME "
10 FORQ=1TO5:INPUTB(Q):A(B(Q))=Q:NEXT:FORN=1TO4:J=A(N):K=B(N):IFN<>JTHENT=1-T
20 A(K)=J:B(J)=K:NEXT:PRINT MID$("EVENODD",1+T*4,4)